--[[ 编码: WMS-38-03 名称: 搬运指令-创建前 作者:HAN 日期:2025-1-29 级别:固定 (说明本段代码在项目中不太会变化) 函数: AfterDataObjDelete 功能: 1)删除在任务相关的【任务动作】 更改记录: --]] wms_base = require ("wms_base") function AfterDataObjDelete ( strLuaDEID ) local nRet, strRetInfo -- step1 获取当前删除的任务编码 nRet, strRetInfo = mobox.getCurEditDataObjAttr( strLuaDEID, "S_CODE" ) if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "获取当前删除的【任务】对象信息失败! "..strRetInfo ) end local obj_attrs = json.decode( strRetInfo ) local task_code = obj_attrs[1].value -- 作业类型 if ( task_code ~= "" ) then -- 删除相关的任务动作 local strCondition = "S_TASK_CODE = '"..task_code.."'" nRet, strRetInfo = mobox.deleteDataObject( strLuaDEID, "Task_Action", strCondition ) if ( nRet ~= 0) then lua.Error( strLuaDEID, debug.getinfo(1), "删除任务相关的【任务动作】失败! "..strRetInfo ) end -- V6.2 nRet, strRetInfo = wms.wms_UnlockByTask(strLuaDEID,task_code) if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "wms_UnlockByTask 失败! "..strRetInfo ) end end end